#include "game.h"

static void InitBoard(char board[][COL], int row, int col)
{
	for (int i = 0; i < row; i++){
		for (int j = 0; j < col; j++){
			board[i][j] = INIT;
		}
	}
}
static void ShowBoard(char board[][COL], int row, int col)
{
	system("cls");
	printf(" ");
	for (int i = 0; i < col; i++){
		printf("%4d", i + 1);
	}
	printf("\n--------------\n");
	for (int i = 0; i < row; i++){
		printf("%-2d", i + 1); //2
		for (int j = 0; j < col; j++){
			printf("| %c ", board[i][j]); //12
		}
		printf("\n--------------\n");
	}
}
//#define WHITE 'X' //Player
//#define BLACK 'O' //Computer
//#define DRAW 'D'
//#define NEXT 'N'
static char IsEnd(char board[][COL], int row, int col)
{
	for (int i = 0; i < row; i++){
		if (board[i][0] == board[i][1] && \
			board[i][1] == board[i][2] && \
			board[i][0] != INIT){
			return board[i][0];
		}
	}

	for (int j = 0; j < COL; j++){
		if (board[0][j] == board[1][j] && \
			board[1][j] == board[2][j] && \
			board[0][j] != INIT){
			return board[0][j];
		}
	}
	if (board[0][0] == board[1][1] && \
		board[1][1] == board[2][2] && \
		board[1][1] != INIT){
		return board[1][1];
	}
	if (board[0][2] == board[1][1] && \
		board[1][1] == board[2][0] && \
		board[1][1] != INIT){
		return board[1][1];
	}
	for (int i = 0; i < row; i++){
		for (int j = 0; j < col; j++){
			if (board[i][j] == INIT){
				return NEXT;
			}
		}
	}
	return DRAW;
}
static void PlayerMove(char board[][COL], int row, int col)
{
	int x = 0;
	int y = 0;
	while (1){
		printf("Please Enter Postion<x,y># ");
		scanf("%d %d", &x, &y);
		if (x < 1 || y < 1 || x > 3 || y > 3){
			printf("Enter Postion Error!\n");
			continue;
		}
		if (board[x - 1][y - 1] == INIT){
			board[x - 1][y - 1] = WHITE;
			break;
		}
		else{
			printf("Postion Is Not Empty!\n");
		}
	}
}
static void ComputerMove(char board[][COL], int row, int col)
{
	while (1){
		int x = rand() % row;
		int y = rand() % col;
		if (board[x][y] == INIT){
			board[x][y] = BLACK;
			break;
		}
	}
}

void Game()
{
	char board[ROW][COL];
	InitBoard(board, ROW, COL);

	srand((unsigned long)time(NULL));
	char result = 0;
	while (1){
		ShowBoard(board, ROW, COL);
		PlayerMove(board, ROW, COL);
		result = IsEnd(board, ROW, COL);
		if (result != NEXT){
			break;
		}
		ShowBoard(board, ROW, COL);
		ComputerMove(board, ROW, COL);
		result = IsEnd(board, ROW, COL);
		if (result != NEXT){
			break;
		}
	}
	ShowBoard(board, ROW, COL);
	switch (result){
	case WHITE:
		printf("You Win!\n");
		break;
	case BLACK:
		printf("You Lose!\n");
		break;
	case DRAW:
		printf("You == Computer!\n");
		break;
	default:
		printf("BUG!\n"); //Do Nothing!
		break;
	}
}